home *** CD-ROM | disk | FTP | other *** search
/ Komputer for Alle 1999 #8 / 1999 CD 8 (black).iso / maskdemo / DATA1.CAB / Program_Executable_Files / Daventry / KQ / RAVENSRH.CS < prev    next >
Encoding:
Text File  |  1998-12-15  |  1.6 KB  |  59 lines

  1. echo $1 $2 $3 $4
  2. if test $2 == Init
  3.    set Daventry::Raven::SarahHouse  loaded
  4.     if test $Daventry::FirstTime::Var == true
  5.            start.cs
  6.         set Daventry::FirstTime::Var false
  7.     endif
  8. else if test $2 == ConnorAction
  9.    if test $4 == do
  10.       KQMonster::setAlarmRadius $1 0
  11.       setThirdPerson
  12.       handsOff 1
  13.       sendEvent 0 $1 KQCueEvent 5 0
  14.       KQMonster::speak Connor Connor 1000 28 14 68 1 1
  15.     sendEvent 0 Connor KQStatsChangeRequestEvent 0 0 0 0 5
  16.    endif
  17. else if test $2 == EndLoop
  18.    if test $3 == fromsarah
  19.       KQMonster::speak Connor Connor 1000 28 14 95 1 1
  20.       move KQCamera 0 281200 197750 15300 -0.3 0 2.1
  21.       KQCamera::follow Connor
  22.       handsOff 0
  23.      setThirdPerson
  24.       set Daventry::Raven::SarahHouse done
  25. #      loadKQ ravenwiz.kq
  26. #      set Daventry::Raven::Wizard loaded
  27.       echo Deleteing $1
  28.       deleteObject $1
  29.    endif
  30. else if test $2 == Cue
  31.    if test $3 == 5
  32.       getLoc $1
  33.       pointAndCue $KQObject::locOnly $1 7 0
  34.    else if test $3 == 7
  35.       KQCamera::follow none
  36. #      KQMonster::speak $1 $1 1000 0 0 59 2 2
  37.       KQSound::play raven.snd
  38.       pointAndCue 269000 193000 -1 Connor 0 0
  39.      move $1 1 0 0 0 .17 0 -1.4
  40.       move KQCamera 0 282700 196350 18100 -0.66 0 1.9
  41.       KQMonster::setState $1 special fromsarah
  42.    else if test $3 == 10
  43.       random 0 $Daventry::Raven::cawInterval
  44.       if test "$Console::Return" == 1
  45.          KQMonster::setState $1 Special caw
  46.       endif
  47.    endif
  48.    endif
  49.    endif
  50. else if test $2 == TalkComplete
  51.    if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 0 0 59 2
  52.    endif
  53. endif
  54. endif
  55. endif
  56. endif
  57. endif
  58.  
  59.